<?php
$error=0;
$errorseg = 0; 
$mensajesseg = "";

// Si el segmento no esta vacio, verificamos
if ($segmento <> "") {

    // Consulto el segmento de la pieza	
    $sql_busca_segmento = "select * from tbl_SegmentosCRM where id_Segmento='".$segmento."'";
    $sql_count_encontrados="select count(id_Segmento) as total from ( ".$sql_busca_segmento." ) as dbtbl";
    $res_count_encontrados=mssql_query($sql_count_encontrados);
    $row_count_encontrados=mssql_fetch_object($res_count_encontrados);

    // Si el elemento o segmento existe
    if($row_count_encontrados->total>0) {

	// Obtengo los datos del segmento
        $res_busca_segmento=mssql_query($sql_busca_segmento);
        $row_busca_segmento=mssql_fetch_object($res_busca_segmento);
	$nombresegmento = urldecode($row_busca_segmento->st_Segmento);

	// Valido el segmento en tx_Query como tal
        $sql_valida_segmento = " select count(id_UsuarioWeb) as elementos, 
				 sum(i_PermissionMarketing) as permisos, 
				 sum(i_EmailBlocked) as bloqueados 
				 from tbl_UsuariosWeb WITH(NOLOCK) 
				 where id_UsuarioWeb in (".urldecode($row_busca_segmento->tx_Query).")";
        $res_valida_segmento=mssql_query($sql_valida_segmento);
        $row_valida_segmento=mssql_fetch_object($res_valida_segmento);
        $total_usuarios=$row_valida_segmento->elementos;
        $totalconPM=$row_valida_segmento->permisos;
        $totalconEBLOCK=$row_valida_segmento->bloqueados;

	// WARNING: Hay elementos sin permissionmarketing
        if($totalconPM < $total_usuarios) {

	    $fallidos = $total_usuarios - $totalconPM;
            $errorseg = 1;
            $mensajesseg .= "<font color='#FF0000'>&nbsp;&nbsp;&raquo;&nbsp;El filtro de <i>Permission Marketing</i> no se encontr&oacute; o est&aacute; mal configurado!</font><br>";
            //$mensajesseg .= "<font color='#FF0000'>&nbsp;&nbsp;&raquo;&nbsp;Tiene ".number_format($fallidos)." elemento(s) sin <i>Permission Marketing!</i></font><br>";

        }

    } // Fin de si el segmento existe

} // Fin si el segmento no esta vacio

if ($errorseg == 1) {

	// Mensaje final de salida
	$erroressegmentos  = "<tr><td class='conceptCellBG'><br>";
	$erroressegmentos .= "<img src='https://c3.cacto.com/mx/cacto/images/respFail.gif'><br>";
	$erroressegmentos .= "En el segmento <strong>".$nombresegmento."</strong>:<br>";
	$erroressegmentos .= $mensajesseg."<br>";
	$erroressegmentos .= "<i>&nbsp;* Se recomienda ajustar el segmento, antes de enviar la campa&ntilde;a.</i>";
	$erroressegmentos .= "<br><br></td></tr>";
    $error=1;

}

//else {
	// Mensaje final de salida
//	$erroressegmentos  = "<tr><td>";
//	$erroressegmentos .= "<img src='https://c3.cacto.com/mx/cacto/images/respOK.gif'><br>";
//	$erroressegmentos .= "El segmento <strong>".$nombresegmento."</strong> esta OK";
//	$erroressegmentos .= "</td></tr>";
//}

?>